home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1984 November / 64er_Magazin_84-11_1984_Markt__Technik_de.d64 / get koalapic (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  2KB  |  63 lines
  1. 100 rem display koala pic v2.1
  2. 110 rem (c) 1984 by michael a. meiszl
  3. 120 rem ====================================================================
  4. 122 : rem achtung: das programm enthaelt pruefsummen, so dass sie fehler ...
  5. 124 rem ... leichter Dmen koennen, bes. in den data zeilen!
  6. 126 rem ====================================================================
  7. 130 a=52500:e=a+335:zl=9990:poke53281,0:poke53280,0
  8. 140 print"[147][158][142]koala painter display
  9. 150 [153]"sys 52500,"[199](34)"name"[199](34)"[,geraetenummer]
  10. 160 print,"=> load + anzeige":print,"(ende mit 'space')
  11. 170 [153]"sys 52503
  12. 180 print,"=> nur anzeige
  13. 190 [153]"sys 52506
  14. 200 print,"=> bildschirm wieder normal
  15. 210 [153]"sys 52509,"[199](34)"name"[199](34)"[,geraetenummer]
  16. 220 print,"=> bild laden":print:print
  17. 230 fori=atoestep8:zl=zl+10
  18. 240 ch=0:forj=0to7:readx:ch=ch+x:pokei+j,x:next
  19. 250 readck:ifck<>chthenprint"data error in zeile"zl:end
  20. 260 next:print"[159]programm bereit
  21. 10000 [131]76,32,205,76,145,205,76,79, 894
  22. 10010 [131]206,76,47,205,32,47,205,32, 850
  23. 10020 [131]145,205,32,228,255,201,32,208, 1306
  24. 10030 [131]249,240,235,32,66,206,32,87, 1147
  25. 10040 [131]226,201,9,144,3,76,88,182, 929
  26. 10050 [131]160,9,169,32,153,97,206,136, 962
  27. 10060 [131]208,250,177,187,153,98,206,200, 1479
  28. 10070 [131]196,183,144,246,169,15,162,91, 1206
  29. 10080 [131]160,206,32,189,255,162,8,32, 1044
  30. 10090 [131]121,0,201,44,208,3,32,155, 764
  31. 10100 [131]183,169,111,160,0,32,186,255, 1096
  32. 10110 [131]32,131,205,169,0,162,0,160, 859
  33. 10120 [131]160,32,213,255,8,32,138,205, 1043
  34. 10130 [131]40,176,1,96,76,156,225,165, 935
  35. 10140 [131]1,41,254,133,1,96,165,1, 692
  36. 10150 [131]9,1,133,1,96,173,17,208, 638
  37. 10160 [131]41,239,141,17,208,32,131,205, 1014
  38. 10170 [131]162,191,160,64,32,56,206,162, 1033
  39. 10180 [131]200,160,0,32,61,206,162,195, 1016
  40. 10190 [131]160,39,32,14,206,162,195,160, 968
  41. 10200 [131]40,32,56,206,162,216,160,0, 872
  42. 10210 [131]32,61,206,162,199,160,15,32, 867
  43. 10220 [131]14,206,173,16,199,141,33,208, 990
  44. 10230 [131]141,32,208,173,17,208,9,34, 822
  45. 10240 [131]141,17,208,173,22,208,41,223, 1033
  46. 10250 [131]9,16,141,22,208,169,40,141, 746
  47. 10260 [131]24,208,162,160,160,0,32,56, 802
  48. 10270 [131]206,162,224,160,0,32,61,206, 1051
  49. 10280 [131]162,191,160,63,32,14,206,173, 1001
  50. 10290 [131]0,221,41,248,141,0,221,173, 1045
  51. 10300 [131]17,208,9,16,141,17,208,76, 692
  52. 10310 [131]138,205,142,106,206,140,107,206, 1250
  53. 10320 [131]160,0,177,251,145,253,165,252, 1403
  54. 10330 [131]205,106,206,208,8,165,251,205, 1354
  55. 10340 [131]107,206,208,1,96,230,251,208, 1307
  56. 10350 [131]2,230,252,230,253,208,227,230, 1632
  57. 10360 [131]254,76,22,206,134,252,132,251, 1327
  58. 10370 [131]96,134,254,132,253,96,32,121, 1118
  59. 10380 [131]0,201,44,208,3,76,115,0, 647
  60. 10390 [131]76,8,175,32,129,255,173,0, 848
  61. 10400 [131]221,9,3,141,0,221,96,129, 820
  62. 10410 [131]80,73,67,32,63,32,0,0, 347
  63.